home *** CD-ROM | disk | FTP | other *** search
/ User's Choice Windows CD / User's Choice Windows CD (CMS Software)(1993).iso / win_a_d / dyndlg.zip / WNDPROC.LB < prev   
Text File  |  1992-07-17  |  13KB  |  366 lines
  1. //*-------------------------------------------------------------------------
  2. //| Title:
  3. //|     WNDPROC.C
  4. //|
  5. //| Contents:
  6. //|     MainWndProc()
  7. //*-------------------------------------------------------------------------
  8. #define _WINDOWS
  9. #include <WINDOWS.H>
  10. #include "WNDPROC.H"
  11. #include "Base_App.H"
  12. #include "GLOBALS.H"
  13.  
  14. //*-------------------------------------------------------------------------
  15. //| Title:
  16. //|     MainWndProc
  17. //|
  18. //| Parameters:
  19. //|     hWnd            - Handle to the message's destination window
  20. //|     wMessage        - Message number of the current message
  21. //|     wParam          - Additional info associated with the message
  22. //|     lParam          - Additional info associated with the message
  23. //|
  24. //| Purpose:
  25. //|     This is the window procedure for the application's main window.
  26. //*-------------------------------------------------------------------------
  27. LRESULT FAR PASCAL MainWndProc(HWND    hWnd,       
  28.                                UINT    wMessage,   
  29.                                WPARAM  wParam,     
  30.                                LPARAM  lParam)     
  31. {
  32.     static HICON  hIcon;
  33.  
  34.     switch (wMessage)
  35.         {
  36.  
  37.         case WM_CREATE:
  38.             hIcon = LoadIcon(ghInstance, "MyIcon");        // This icon will be used only for dragging
  39.             break;
  40.  
  41.         case WM_QUERYDRAGICON:
  42.            return (LRESULT)(WORD)hIcon;
  43.  
  44.         case WM_COMMAND:
  45.         {
  46.             FARPROC lpProcDlg;
  47.  
  48.             if (wParam == IDM_ABOUT) {
  49.                 lpProcDlg = MakeProcInstance(AboutBox, ghInstance);
  50.  
  51.                 DialogBox(ghInstance,
  52.                     "AboutBox",
  53.                     hWnd,
  54.                     lpProcDlg);
  55.  
  56.                 FreeProcInstance(lpProcDlg);
  57.                 break;
  58.             }
  59.             else
  60.             if (wParam == IDM_DIALOG) {
  61.                 lpProcDlg = MakeProcInstance(SpecialDlgBox, ghInstance);
  62.  
  63.                 DialogBox(ghInstance,
  64.                     "SpecialDlgBox",
  65.                     hWnd,
  66.                     lpProcDlg);
  67.  
  68.                 FreeProcInstance(lpProcDlg);
  69.                 break;
  70.             }
  71.             else
  72.                 return (LRESULT)(DefWindowProc(hWnd, wMessage, wParam, lParam));
  73.         }
  74.  
  75.         case WM_DESTROY:          // sent when window about to be destroyed
  76.             PostQuitMessage(0);   // Indicate that message loop should exit
  77.             break;                //   since the main window is being destroyed
  78.  
  79.         default:                  // Pass message on for default proccessing
  80.             return (LRESULT)DefWindowProc(hWnd, wMessage, wParam, lParam);
  81.         }
  82.  
  83.     // If we performed non-default processing on the message, return FALSE
  84.     return (LRESULT)FALSE;
  85. }
  86.  
  87.  
  88. BOOL FAR PASCAL AboutBox (HWND hDlg,
  89.                           WORD message,
  90.                           WORD wParam,
  91.                           LONG lParam)
  92. {
  93.  
  94.     switch (message) 
  95.     {
  96.  
  97.         case WM_INITDIALOG:
  98.             return (TRUE);
  99.   
  100.         case WM_COMMAND:
  101.             if (wParam == IDOK  || wParam == IDCANCEL) 
  102.             {
  103.                 EndDialog(hDlg, TRUE);
  104.                 return (TRUE);
  105.             }
  106.             break;
  107.             
  108.     }
  109.     return (FALSE);
  110. }
  111.  
  112. void near PASCAL ShowAllControls (HWND hDlg, int iFirst, int iLast, BOOL bShow)
  113. {
  114.   int  i;
  115.   RECT rect;
  116.  
  117. //  PostMessage (hDlg, WM_SETREDRAW, FALSE, 0L);
  118. //  for (i = iFirst; i < iLast; i++)
  119. //    ShowWindow (GetDlgItem (hDlg, i), bShow);
  120. //
  121. //  GetClientRect (GetDlgItem (hDlg, ID_FRAME), &rect);
  122. //  InvalidateRect (hDlg, &rect, TRUE);
  123. //  PostMessage (hDlg, WM_SETREDRAW, TRUE, 0L);
  124.  
  125.  HWND hFrame;
  126.  
  127.  
  128.   hFrame = GetDlgItem (hDlg, ID_FRAME);
  129.   PostMessage (hFrame, WM_SETREDRAW, FALSE, 0L);
  130.   for (i = iFirst; i < iLast; i++)
  131.     ShowWindow (GetDlgItem (hDlg, i), bShow);
  132.  
  133.   GetClientRect (hFrame, &rect);
  134.   InvalidateRect (hFrame, &rect, TRUE);
  135.   PostMessage (hFrame, WM_SETREDRAW, TRUE, 0L);
  136. }
  137.  
  138.  
  139. void near PASCAL AddIconToListBox (HWND hDlg, LPSTR myStr, HICON hIcon)
  140. {
  141.    WORD wIndex;
  142.  
  143.    wIndex = SendDlgItemMessage (hDlg, ID_LISTBOX, LB_ADDSTRING, 0, (LONG)myStr);
  144.    if (wIndex != LB_ERR && wIndex != LB_ERRSPACE)
  145.      SendDlgItemMessage (hDlg, ID_LISTBOX, LB_SETITEMDATA, wIndex, MAKELONG (hIcon, 0));
  146. } 
  147.  
  148.  
  149. void near PASCAL DrawItem (HWND hDlg, LPDRAWITEMSTRUCT lpdis)
  150. {
  151.    char       szItemString [15];
  152.    HICON      hIcon;
  153.    int        cxIcon, cyIcon;
  154.    RECT       lbRect, textRect;
  155.    TEXTMETRIC tm;
  156.  
  157.    cxIcon = GetSystemMetrics (SM_CXICON);
  158.    cyIcon = GetSystemMetrics (SM_CYICON);
  159.    GetTextMetrics (lpdis->hDC, &tm);
  160.  
  161.    SendDlgItemMessage (hDlg, ID_LISTBOX, LB_GETTEXT, lpdis->itemID,
  162.                       (LONG)(LPSTR)szItemString);
  163.    hIcon = (HICON)LOWORD (SendDlgItemMessage (hDlg, ID_LISTBOX, LB_GETITEMDATA,
  164.                        lpdis->itemID, 0L));
  165.  
  166.    GetClientRect (GetDlgItem (hDlg, ID_LISTBOX), &lbRect);
  167.    
  168.    DrawIcon(lpdis->hDC, lpdis->rcItem.left+(lbRect.right/2) - (cxIcon/2), 
  169.                         lpdis->rcItem.top + (tm.tmHeight/4), hIcon);
  170.  
  171.    textRect.left  = lpdis->rcItem.left;
  172.    textRect.top   = lpdis->rcItem.top + cyIcon + (tm.tmHeight/4);
  173.    textRect.right = lpdis->rcItem.right;    
  174.    textRect.bottom= lpdis->rcItem.bottom;
  175.    DrawText (lpdis->hDC, szItemString, lstrlen (szItemString),
  176.              &textRect, DT_CENTER);
  177.  
  178.  
  179. }
  180.  
  181.  
  182. BOOL FAR PASCAL SpecialDlgBox (HWND hDlg,
  183.                                WORD message,
  184.                                WORD wParam,
  185.                                LONG lParam)
  186. {
  187.     static int curFirst, curLast;
  188.     switch (message) 
  189.     {
  190.         case WM_INITDIALOG:
  191.             AddIconToListBox (hDlg, "FileOpen",     LoadIcon (ghInstance, "FOpenIcon"  ));
  192.             AddIconToListBox (hDlg, "Font",         LoadIcon (ghInstance, "FontIcon"   ));
  193.             AddIconToListBox (hDlg, "PrintSetup",   LoadIcon (ghInstance, "PrSetupIcon"));
  194.             AddIconToListBox (hDlg, "Print",        LoadIcon (ghInstance, "PrintIcon"  ));
  195.             AddIconToListBox (hDlg, "Find",         LoadIcon (ghInstance, "FindIcon"   ));
  196.             AddIconToListBox (hDlg, "Find/Replace", LoadIcon (ghInstance, "FindRepIcon"));
  197.  
  198.             ShowAllControls (hDlg,IDCD_FONTFIRST,    IDCD_FONTLAST,    SW_HIDE);
  199.             ShowAllControls (hDlg,IDCD_PRSETUPFIRST, IDCD_PRSETUPLAST, SW_HIDE);
  200.             ShowAllControls (hDlg,IDCD_PRINTFIRST,   IDCD_PRINTLAST,   SW_HIDE);
  201.             ShowAllControls (hDlg,IDCD_FINDFIRST,    IDCD_FINDLAST,    SW_HIDE);
  202.             ShowAllControls (hDlg,IDCD_REPFIRST,     IDCD_REPLAST,     SW_HIDE);
  203.  
  204.             curFirst = IDCD_FOPENFIRST;
  205.             curLast  = IDCD_FOPENLAST;
  206.             return TRUE;
  207.  
  208.         case WM_MEASUREITEM:
  209.            {
  210.              MEASUREITEMSTRUCT *ms;
  211.              TEXTMETRIC tm;
  212.              HDC  hDC;
  213.              int  cy;
  214.  
  215.              ms = (MEASUREITEMSTRUCT *)lParam;
  216.  
  217.              if (ms->CtlID == ID_LISTBOX)
  218.              {
  219.                cy = GetSystemMetrics (SM_CYICON);
  220.   
  221.                hDC = GetDC (hDlg);
  222.                GetTextMetrics (hDC, &tm);
  223.                ReleaseDC (hDlg, hDC);
  224.   
  225.                ms->itemHeight = cy + 1.5*tm.tmHeight;
  226.                ms->itemWidth  = 58;
  227.              }
  228.            } 
  229.            break;
  230.  
  231.         case WM_DRAWITEM:
  232.            {
  233.              LPDRAWITEMSTRUCT lpdis;
  234.  
  235.              lpdis = (LPDRAWITEMSTRUCT)lParam;
  236.  
  237.              if (lpdis->CtlID == ID_LISTBOX)
  238.              {            
  239.                DWORD  dwBkColor, dwOldBkColor, dwTextColor;
  240.                HBRUSH hBrush, hOldBrush;
  241.  
  242.                if (lpdis->itemID == -1)
  243.                  DrawFocusRect (lpdis->hDC, (LPRECT)&lpdis->rcItem);
  244.  
  245.                if ((lpdis->itemAction & ODA_FOCUS) && 
  246.                    (!lpdis->itemState  & ODS_FOCUS))
  247.                  DrawFocusRect (lpdis->hDC, (LPRECT)&lpdis->rcItem);
  248.  
  249.  
  250.                if (lpdis->itemState & ODS_SELECTED)
  251. //                 InvertRect   (lpdis->hDC, (LPRECT)&lpdis->rcItem);
  252.                {
  253.                  dwBkColor = GetSysColor (COLOR_HIGHLIGHT);
  254.                  dwTextColor=GetSysColor (COLOR_HIGHLIGHTTEXT);
  255.                } 
  256.                else
  257.                { 
  258.                  dwBkColor = GetSysColor (COLOR_WINDOW);
  259.                  dwTextColor=GetSysColor (COLOR_WINDOWTEXT);
  260.                }
  261.  
  262.                dwOldBkColor = SetBkColor (lpdis->hDC, dwBkColor);
  263.                SetTextColor (lpdis->hDC, dwTextColor);
  264.  
  265.                hBrush = CreateSolidBrush (dwBkColor);
  266.                hOldBrush = SelectObject (lpdis->hDC, hBrush);
  267.  
  268.                PatBlt (lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top,
  269.                                    lpdis->rcItem.right  - lpdis->rcItem.left,
  270.                                    lpdis->rcItem.bottom - lpdis->rcItem.top,
  271.                                    PATCOPY);
  272.  
  273.                DrawItem (hDlg, lpdis);
  274.  
  275.                SetBkColor (lpdis->hDC, dwOldBkColor);       // Reset background color
  276.                DeleteObject (SelectObject (lpdis->hDC, hOldBrush));
  277.  
  278.                if ((lpdis->itemAction & ODA_FOCUS) && 
  279.                    (lpdis->itemState  & ODS_FOCUS))
  280.                  DrawFocusRect (lpdis->hDC, (LPRECT)&lpdis->rcItem);
  281.  
  282.  
  283.              }             
  284.            }
  285.            return TRUE;
  286.  
  287.         case WM_COMMAND:  // wParam == IDOK || IDCANCEL
  288.             if (wParam == IDCD_FOPEN11   || wParam == IDCD_FOPEN12  ||
  289.                 wParam == IDCD_FONT7     || wParam == IDCD_FONT8    ||
  290.                 wParam == IDCD_PRINT17   || wParam == IDCD_PRINT18  ||
  291.                 wParam == IDCD_REP7      || wParam == IDCD_REP10    ||
  292.                 wParam == IDCD_FIND8     || wParam == IDCD_FIND9    ||
  293.                 wParam == IDCD_PRSETUP15 || wParam == IDCD_PRSETUP16)             
  294.             {
  295.                 EndDialog(hDlg, TRUE);
  296.                 return (TRUE);
  297.             }
  298.  
  299.             if (HIWORD(lParam) == LBN_SELCHANGE)
  300.             {
  301.                WORD wIndex;
  302.                wIndex = SendDlgItemMessage (hDlg, ID_LISTBOX, LB_GETCURSEL, 0, 0L);
  303.                if (wIndex == LB_ERR) break;
  304.  
  305.  
  306.                switch (wIndex)
  307.                {
  308.                   case IDI_FILEOPEN:
  309.                      if (curFirst == IDCD_FOPENFIRST) return (FALSE);
  310.                      ShowAllControls (hDlg, curFirst, curLast, SW_HIDE);
  311.                      curFirst = IDCD_FOPENFIRST;
  312.                      curLast  = IDCD_FOPENLAST;     
  313.                      break;
  314.  
  315.                   case IDI_FONT:
  316.                      if (curFirst == IDCD_FONTFIRST) return (FALSE);
  317.                      ShowAllControls (hDlg, curFirst, curLast, SW_HIDE);
  318.                      curFirst = IDCD_FONTFIRST;
  319.                      curLast  = IDCD_FONTLAST;     
  320.                      break;
  321.  
  322.                   case IDI_PRSETUP:
  323.                      if (curFirst == IDCD_PRSETUPFIRST) return (FALSE);
  324.                      ShowAllControls (hDlg, curFirst, curLast, SW_HIDE);
  325.                      curFirst = IDCD_PRSETUPFIRST;
  326.                      curLast  = IDCD_PRSETUPLAST;     
  327.                      break;
  328.  
  329.                   case IDI_PRINT:
  330.                      if (curFirst == IDCD_PRINTFIRST) return (FALSE);
  331.                      ShowAllControls (hDlg, curFirst, curLast, SW_HIDE);
  332.                      curFirst = IDCD_PRINTFIRST;
  333.                      curLast  = IDCD_PRINTLAST;     
  334.                      break;
  335.  
  336.                   case IDI_FIND:
  337.                      if (curFirst == IDCD_FINDFIRST) return (FALSE);
  338.                      ShowAllControls (hDlg, curFirst, curLast, SW_HIDE);
  339.                      curFirst = IDCD_FINDFIRST;
  340.                      curLast  = IDCD_FINDLAST;     
  341.                      break;
  342.  
  343.                   case IDI_REPLACE:
  344.                      if (curFirst == IDCD_REPFIRST) return (FALSE);
  345.                      ShowAllControls (hDlg, curFirst, curLast, SW_HIDE);
  346.                      curFirst = IDCD_REPFIRST;
  347.                      curLast  = IDCD_REPLAST;     
  348.                      break;
  349.  
  350.                   default : break;
  351.                }
  352.                ShowAllControls (hDlg, curFirst,  curLast,  SW_SHOW);
  353.                   
  354.             }
  355.             break;
  356.  
  357.        case WM_CLOSE:
  358.             EndDialog(hDlg, TRUE);
  359.             return TRUE;
  360.             
  361.     }
  362.     return (FALSE);
  363. }
  364.  
  365.  
  366.